Appendix 



#define MainForm 1001 

#ifndef example_h_ 
#define example_h_ 
#define appFilecreator 'STRT' 
#define appName "Example" 
#definG appversionNum 0x01 
#define appPrefID 0x00 
#define appPrefVersionNum 0x01 
#endif 

#include <PalmOS,h> 
#inc1ude <PalmOSGlue.h> 
#inc1ude "Example. h" 
#include "Example^Rsc. h" 

Boolean NO = false, YES = true, voidO; ^ 

Coord voidl, void2; 

Boolean isPenDown, isButtonDown; 

BitmapType *gBitmapP = null; 

winHandle onscreenwindow, Offscreenwindow; 

RectangleType OnscreenRectangle, OffscreenRectangle; 

int C = 160, D = 160 
int E = 540, F = 720 
Coord al, bl, a2, b2; 
Coord el, fl, e2, f2; 
intx«0, y=0; 
int g = 190, h « 200; 

static Boolean startMain(EventType * eventP) 
if (isPenDown == NO) 
return true; 

} 



else 
{ 



EvtGetPenC&al, &bl, AvoidO); 

el = g + (al - x) ; 
fl = fi + Cbl - y); 

if(eventP->eType == penDownEvent) 

if (IsButtonDown == YES) 
{ 

a2 = al; 

b2 = bl; 

e2 = el; 

f2 = fl; 



else 
{ 



1 ' 



return true; 



WinSetDrawWindow(offscreenwindow) ; 
winPaint Pixel (el, fl); 
winSetDrawwindow(onscreenwindow) ; 

wincopyRectangle(Offscreenwindow, onscreenwindow, 

fiOffscreenRectangle, x, y, winPaint); 

a2 = al 
b2 = bl 
e2 = el 
f2 = f 1 

return true; 



else if(evGntP->eType == penMoveEvent) 



else 
{ 



ifCisButtonDown == yes) 

q = g + Ca2 - al); 
h = h + Cb2 - bl); 

RctSetRectangleC&offscreenRectangle, g, h, c, D); 

Wi nCopyRectangl eCof f screenwi ndow, Onscreenwi ndow, 

AOffscreenRectangle, x, y, winPaint); 

a2 = al; 
b2 = bl; 
e2 = el; 
f2 = fl; 

return true; 

winSetDrawwindowCoff screenwi ndow); 
winPaintLineCe2, f2, el, f 1) ; 
Wi nSetDrawWi ndow(OnscreenWi ndow) ; 

Wi nCopyRectangl e (Of f screenwi ndow , Onsc r eenwi ndow , 

fioffscreenRectangle, x. y, winPaint); 

a2 = al 
b2 = bl 
e2 = el 
f 2 = f 1 

return true; 



return false; 



else 
{ 



static Boolean MainFormHandleEventCEventType * eventP) 

FormType * frmP; 
Err error; 

if(eventP->eTypG == f rmopenEvent) 

frmP = FrmGetActiveFormC); 
FrniDrawForm(f rmP) ; 

Onscreenwi ndow = winGetDisplaywindowQ ; 
RctsetRectangleC&OnscreenRectangle, x, y, c, D); 

gBitmapP = Bmpcreate(E, F, 1, null, &error); 
Offscreenwindow = winCreateBitmapwindow(qBitmapP, &error); 
RctsetRectangleC&offscreenRectangle, g, h, c, D); 

return true; 



} 



else ifCeventP->eType == f rmcloseEvent) 

WinDeletewinc 
BmpDelete(gBi 

return false; 



Wi nDel etewi ndow(off screenwi ndow, f al se) ; 
BmpDelete(gBitmapp) ; 



} 

else 
{ 



if(keyBitHardl == KeyCurrentStateO) IsButtonDown = YES" 
else IsButtonDown = NO; 
EvtGetPen(&voidl, &void2, &lsPenDown); 

return StartMain(eventP) ; 



static Boolean AppHandleEventCEventType * eventP) 

uintie formid; 
FormType * frmP; 

if CeventP->eType == f rmLoadEvent) 

formid = eventP->data.frmLoad.formlD: 
frmP = FrminitFormCformld); 
FrmSetActiveFormCf rmP) ; 

switch (formid) 

case Main Form: 

^^fTiSetEventHandlerCf rmP, MainFormHandleEvent) ; 
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default: 
^ break; 

return true: 

} 



} 



return false; 



static void AppEventLoop(void) 

Uintl6 error; 
EventType event; 

do 
{ 

EvtGetEventC&event, evtwait Forever) ; 
if (event. eType != keyDown Event) 

else if (event. data. keyoown-modifiers & poweredOnKeyMask) 

else if (event. data. keyDown. chr == vchrHardl) 
continue; 

if (! SysHandleEvent(&event)) 



if (! MenuHandleEvent(0, &event, &error)) 
if (! AppHandleEvent(&event)) 

FrmDispatchEvent(&event) ; 



} 



} while \event. eType != appstopEvent) ; 



Ulnt32 PilotMain(uintl6 cmd, MemPtr cmdPBP, Uintl6 launchFlags) 
switch (cmd) 

case sysAppLaunchCmdNormal Launch : 
FrmGotoForm(MainForm) ; 
AppEventLoopO ; 
F rmcl o s eAll Fo rms ( ) ; 
break; 

default: 
^ break; 

return errNone; 



